[PATCH] wrap calls to clRetainKernel and clRetainEvent

Gbp-Pq: Name 0001-wrap-calls-to-clRetainKernel-and-clRetainEvent.patch

diff --git a/lib/CL/clEnqueueNDRangeKernel.c b/lib/CL/clEnqueueNDRangeKernel.c
index dc0204dac4e58e09637178b862e7b5f61943cf9c..9d7514a1bb3ed6b5066bb387f42b22d51431bf15 100644 (file)
--- a/lib/CL/clEnqueueNDRangeKernel.c
+++ b/lib/CL/clEnqueueNDRangeKernel.c
@@ -608,7 +608,7 @@ if (local_##c1 > 1 && local_##c1 <= local_##c2 && local_##c1 <= local_##c3 && \
   if (pocl_cq_profiling_enabled)
     {
       pocl_cq_profiling_register_event (command_node->event);
-      clRetainKernel (kernel);
+      POname(clRetainKernel) (kernel);
       command_node->event->meta_data->kernel = kernel;
     }
 

diff --git a/lib/CL/pocl_cq_profiling.c b/lib/CL/pocl_cq_profiling.c
index 082d84e6b2b3864711b9618f455a757b17dd6f8b..77caeffd977cdb0b3724d4969535f0a42409efc5 100644 (file)
--- a/lib/CL/pocl_cq_profiling.c
+++ b/lib/CL/pocl_cq_profiling.c
@@ -127,7 +127,7 @@ pocl_cq_profiling_init ()
 void
 pocl_cq_profiling_register_event (cl_event event)
 {
-  clRetainEvent (event);
+  POname(clRetainEvent) (event);
   if (event->meta_data == NULL)
     event->meta_data = (pocl_event_md *)malloc (sizeof (pocl_event_md));